inherited fmFactoryInfo: TfmFactoryInfo
  Caption = #20379#24212#21830#36164#26009
  ExplicitTop = -97
  ExplicitWidth = 320
  ExplicitHeight = 240
  PixelsPerInch = 96
  TextHeight = 13
  inherited lcMain: TdxLayoutControl
    inherited lblCreateDate: TRzDBLabel
      Left = 690
      Top = 512
      ExplicitLeft = 690
      ExplicitTop = 512
    end
    inherited lblCreateStaff: TRzDBLabel
      Left = 690
      Top = 492
      ExplicitLeft = 690
      ExplicitTop = 492
    end
    inherited lblModifyDate: TRzDBLabel
      Left = 554
      Top = 512
      ExplicitLeft = 554
      ExplicitTop = 512
    end
    inherited lblModifyStaff: TRzDBLabel
      Left = 554
      Top = 492
      ExplicitLeft = 554
      ExplicitTop = 492
    end
    object cxDBTextEdit7: TRzDBEdit [4]
      Left = 71
      Top = 52
      Width = 120
      Height = 21
      DataSource = dsBase
      DataField = 'bf_principal'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = [sdBottom]
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 1
    end
    object cxDBTextEdit8: TRzDBEdit [5]
      Left = 451
      Top = 52
      Width = 120
      Height = 21
      DataSource = dsBase
      DataField = 'bf_tel'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = [sdBottom]
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 10
    end
    object cxDBTextEdit9: TRzDBEdit [6]
      Left = 647
      Top = 175
      Width = 120
      Height = 21
      DataSource = dsBase
      DataField = 'bf_fax'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = [sdBottom]
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 15
    end
    object cxDBTextEdit10: TRzDBEdit [7]
      Left = 71
      Top = 76
      Width = 120
      Height = 21
      DataSource = dsBase
      DataField = 'bf_postcode'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = [sdBottom]
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 2
    end
    object cxDBTextEdit11: TRzDBEdit [8]
      Left = 255
      Top = 76
      Width = 120
      Height = 21
      DataSource = dsBase
      DataField = 'bf_mail'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = [sdBottom]
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 7
    end
    object cxDBTextEdit12: TRzDBEdit [9]
      Left = 451
      Top = 76
      Width = 120
      Height = 21
      DataSource = dsBase
      DataField = 'bf_website'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = [sdBottom]
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 11
    end
    object btnBank: TcxButton [10]
      Left = 6
      Top = 124
      Width = 80
      Height = 20
      Caption = #38134#34892#36164#26009
      TabOrder = 4
      OnClick = btnBankClick
    end
    object cxDBTextEdit15: TRzDBEdit [11]
      Left = 71
      Top = 28
      Width = 120
      Height = 21
      DataSource = dsBase
      DataField = 'bf_no'
      ReadOnly = True
      Color = clInfoBk
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = [sdBottom]
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 0
    end
    object cxDBTextEdit2: TRzDBEdit [12]
      Left = 255
      Top = 28
      Width = 120
      Height = 21
      DataSource = dsBase
      DataField = 'bf_no2'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = [sdBottom]
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 5
    end
    object cbxFactoryType: TRzDBComboBox [13]
      Left = 647
      Top = 199
      Width = 120
      Height = 21
      DataField = 'bf_type2'
      DataSource = dsBase
      Ctl3D = False
      FlatButtonColor = 9229030
      FlatButtons = True
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = [sdBottom]
      FrameVisible = True
      FramingPreference = fpCustomFraming
      ItemHeight = 13
      ParentCtl3D = False
      TabOrder = 16
      OnDropDown = cbxFactoryTypeDropDown
    end
    object cxDBTextEdit1: TRzDBEdit [14]
      Left = 451
      Top = 28
      Width = 120
      Height = 21
      DataSource = dsBase
      DataField = 'bf_simpname'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = [sdBottom]
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 9
    end
    object cxDBTextEdit4: TRzDBEdit [15]
      Left = 255
      Top = 52
      Width = 120
      Height = 21
      DataSource = dsBase
      DataField = 'bf_cnaddress'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = [sdBottom]
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 6
    end
    object edtRealno: TRzDBEdit [16]
      Left = 647
      Top = 28
      Width = 120
      Height = 21
      DataSource = dsBase
      DataField = 'bf_cnname'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = [sdBottom]
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 13
      OnKeyUp = edtRealnoKeyUp
    end
    inherited pcDetails: TcxPageControl
      Top = 257
      Width = 746
      TabOrder = 17
      ExplicitTop = 257
      ExplicitWidth = 746
      ClientRectRight = 746
      inherited cxTabSheet1: TcxTabSheet
        ExplicitWidth = 746
        inherited grdDetails: TcxGrid
          Width = 746
          RootLevelOptions.DetailTabsPosition = dtpTop
          ExplicitLeft = 86
          ExplicitTop = 2
          ExplicitWidth = 761
          inherited tvDetails: TcxGridDBBandedTableView
            Bands = <
              item
              end
              item
                Visible = False
              end>
            object tvDetailsColumn1: TcxGridDBBandedColumn [0]
              Caption = #22995#21517
              DataBinding.FieldName = 'blm_cnname'
              Width = 62
              Position.BandIndex = 0
              Position.ColIndex = 0
              Position.RowIndex = 0
            end
            object tvDetailsColumn2: TcxGridDBBandedColumn [1]
              Caption = #37096#38376
              DataBinding.FieldName = 'blm_department'
              Width = 61
              Position.BandIndex = 0
              Position.ColIndex = 1
              Position.RowIndex = 0
            end
            object tvDetailsColumn3: TcxGridDBBandedColumn [2]
              Caption = #32844#20301
              DataBinding.FieldName = 'blm_job'
              Width = 57
              Position.BandIndex = 0
              Position.ColIndex = 2
              Position.RowIndex = 0
            end
            object tvDetailsColumn4: TcxGridDBBandedColumn [3]
              Caption = #30005#35805
              DataBinding.FieldName = 'blm_tel'
              Width = 90
              Position.BandIndex = 0
              Position.ColIndex = 3
              Position.RowIndex = 0
            end
            object tvDetailsColumn5: TcxGridDBBandedColumn [4]
              Caption = #20256#30495
              DataBinding.FieldName = 'blm_fax'
              Width = 95
              Position.BandIndex = 0
              Position.ColIndex = 4
              Position.RowIndex = 0
            end
            object tvDetailsColumn6: TcxGridDBBandedColumn [5]
              Caption = #25163#26426
              DataBinding.FieldName = 'blm_mobile'
              Width = 93
              Position.BandIndex = 0
              Position.ColIndex = 5
              Position.RowIndex = 0
            end
            object tvDetailsColumn7: TcxGridDBBandedColumn [6]
              Caption = 'Email'
              DataBinding.FieldName = 'blm_mail'
              Width = 104
              Position.BandIndex = 0
              Position.ColIndex = 6
              Position.RowIndex = 0
            end
            object tvDetailsColumn8: TcxGridDBBandedColumn [7]
              Caption = 'MSN/QQ'
              DataBinding.FieldName = 'blm_msn'
              Width = 107
              Position.BandIndex = 0
              Position.ColIndex = 7
              Position.RowIndex = 0
            end
            inherited tvDetailsColumnLast: TcxGridDBBandedColumn
              Position.BandIndex = 0
              Position.ColIndex = 8
              Position.RowIndex = 0
            end
            inherited tvDetailsOrder: TcxGridDBBandedColumn
              Position.ColIndex = 9
            end
            object tvDetailsColumn9: TcxGridDBBandedColumn
              Caption = #20852#36259#29233#22909
              DataBinding.FieldName = 'blm_hobby'
              Width = 80
              Position.BandIndex = 0
              Position.ColIndex = 10
              Position.RowIndex = 0
            end
            object tvDetailsColumn10: TcxGridDBBandedColumn
              Caption = #20027#35201#36127#36131
              DataBinding.FieldName = 'blm_fuzhe'
              Width = 120
              Position.BandIndex = 0
              Position.ColIndex = 11
              Position.RowIndex = 0
            end
          end
          object tvFollow: TcxGridDBTableView [1]
            OnKeyDown = tvFollowKeyDown
            Navigator.Buttons.CustomButtons = <>
            Navigator.Buttons.PriorPage.Visible = False
            Navigator.Buttons.NextPage.Visible = False
            Navigator.Buttons.Refresh.Visible = False
            Navigator.Buttons.SaveBookmark.Visible = False
            Navigator.Buttons.GotoBookmark.Visible = False
            Navigator.Buttons.Filter.Visible = False
            Navigator.Visible = True
            DataController.DataSource = dsFollow
            DataController.Summary.DefaultGroupSummaryItems = <>
            DataController.Summary.FooterSummaryItems = <>
            DataController.Summary.SummaryGroups = <>
            OptionsView.NavigatorOffset = 0
            OptionsView.Footer = True
            OptionsView.GroupByBox = False
            OptionsView.Indicator = True
            OptionsView.IndicatorWidth = 30
            object tvFollowColumn1: TcxGridDBColumn
              Caption = #32852#31995#26085#26399
              DataBinding.FieldName = 'bcf_date'
              Width = 80
            end
            object tvFollowColumn2: TcxGridDBColumn
              Caption = #23545#26041#32852#31995#20154
              DataBinding.FieldName = 'bcf_man'
              Width = 80
            end
            object tvFollowColumn3: TcxGridDBColumn
              Caption = #26412#26041#32852#31995#20154
              DataBinding.FieldName = 'bcf_staff'
              Width = 80
            end
            object tvFollowColumn6: TcxGridDBColumn
              Caption = #32852#31995#31867#22411
              DataBinding.FieldName = 'bcf_type'
              Width = 80
            end
            object tvFollowColumn4: TcxGridDBColumn
              Caption = #32852#31995#26631#39064
              DataBinding.FieldName = 'bcf_title'
              Width = 120
            end
            object tvFollowColumn5: TcxGridDBColumn
              Caption = #32852#31995#20869#23481
              DataBinding.FieldName = 'bcf_content'
              PropertiesClassName = 'TcxBlobEditProperties'
              Properties.BlobEditKind = bekMemo
              Properties.BlobPaintStyle = bpsText
              Properties.PopupWidth = 300
              Width = 200
            end
            object tvFollowColumn7: TcxGridDBColumn
              Caption = #38468#20214#21517
              DataBinding.FieldName = 'bcf_filename'
              Width = 120
            end
            object tvFollowColumn8: TcxGridDBColumn
              Caption = #38468#20214#25805#20316
              PropertiesClassName = 'TcxButtonEditProperties'
              Properties.Buttons = <
                item
                  Caption = #28155#21152
                  Default = True
                  Kind = bkText
                end
                item
                  Caption = #21024#38500
                  Kind = bkText
                end
                item
                  Caption = #21478#23384#20026
                  Kind = bkText
                end
                item
                  Caption = #26597#30475
                  Kind = bkText
                end>
              Properties.ViewStyle = vsButtonsOnly
              Properties.OnButtonClick = tvFollowColumn8PropertiesButtonClick
              Options.ShowEditButtons = isebAlways
              Width = 160
            end
            object tvFollowLast: TcxGridDBColumn
              Visible = False
            end
          end
          object tvOutBusiness: TcxGridDBTableView [2]
            OnKeyDown = tvOutBusinessKeyDown
            Navigator.Buttons.CustomButtons = <>
            Navigator.Buttons.PriorPage.Visible = False
            Navigator.Buttons.NextPage.Visible = False
            Navigator.Buttons.Refresh.Visible = False
            Navigator.Buttons.SaveBookmark.Visible = False
            Navigator.Buttons.GotoBookmark.Visible = False
            Navigator.Buttons.Filter.Visible = False
            Navigator.Visible = True
            DataController.DataSource = dsOutBusiness
            DataController.Summary.DefaultGroupSummaryItems = <>
            DataController.Summary.FooterSummaryItems = <
              item
                Kind = skCount
                Column = tvOutBusinessColumn1
              end>
            DataController.Summary.SummaryGroups = <>
            OptionsView.NavigatorOffset = 0
            OptionsView.Footer = True
            OptionsView.GroupByBox = False
            OptionsView.Indicator = True
            OptionsView.IndicatorWidth = 30
            object tvOutBusinessColumn1: TcxGridDBColumn
              Caption = #26085#26399
              DataBinding.FieldName = 'dob_date'
              Width = 80
            end
            object tvOutBusinessColumn2: TcxGridDBColumn
              Caption = #20986#24046#20154
              DataBinding.FieldName = 'dob_staff'
              Width = 80
            end
            object tvOutBusinessColumn3: TcxGridDBColumn
              Caption = #20379#24212#21830#32852#31995#20154
              DataBinding.FieldName = 'dob_man'
              Width = 80
            end
            object tvOutBusinessColumn4: TcxGridDBColumn
              Caption = #20986#24046#20027#39064
              DataBinding.FieldName = 'dob_title'
              Width = 120
            end
            object tvOutBusinessColumn5: TcxGridDBColumn
              Caption = #20986#24046#20869#23481' '
              DataBinding.FieldName = 'dob_content'
              PropertiesClassName = 'TcxBlobEditProperties'
              Properties.BlobEditKind = bekMemo
              Properties.BlobPaintStyle = bpsText
              Width = 300
            end
            object tvOutBusinessColumn6: TcxGridDBColumn
              Caption = #22791#27880
              DataBinding.FieldName = 'dob_remark'
              Width = 120
            end
            object tvOutBusinessColumn7: TcxGridDBColumn
              Caption = #38468#20214#21517
              DataBinding.FieldName = 'dob_filename'
              Width = 120
            end
            object tvOutBusinessColumn8: TcxGridDBColumn
              Caption = #38468#20214#25805#20316
              PropertiesClassName = 'TcxButtonEditProperties'
              Properties.Buttons = <
                item
                  Caption = #28155#21152
                  Default = True
                  Kind = bkText
                end
                item
                  Caption = #21024#38500
                  Kind = bkText
                end
                item
                  Caption = #21478#23384#20026
                  Kind = bkText
                end
                item
                  Caption = #26597#30475
                  Kind = bkText
                end>
              Properties.ViewStyle = vsButtonsOnly
              Properties.OnButtonClick = tvOutBusinessColumn8PropertiesButtonClick
              Options.ShowEditButtons = isebAlways
              Width = 160
            end
            object tvOutBusinessLast: TcxGridDBColumn
              Width = 80
            end
          end
          object tvRemark: TcxGridDBTableView [3]
            OnKeyDown = tvRemarkKeyDown
            Navigator.Buttons.CustomButtons = <>
            Navigator.Buttons.PriorPage.Visible = False
            Navigator.Buttons.NextPage.Visible = False
            Navigator.Buttons.Refresh.Visible = False
            Navigator.Buttons.SaveBookmark.Visible = False
            Navigator.Buttons.GotoBookmark.Visible = False
            Navigator.Buttons.Filter.Visible = False
            Navigator.Visible = True
            DataController.DataSource = dsRemark
            DataController.Summary.DefaultGroupSummaryItems = <>
            DataController.Summary.FooterSummaryItems = <>
            DataController.Summary.SummaryGroups = <>
            OptionsView.NavigatorOffset = 0
            OptionsView.Footer = True
            OptionsView.GroupByBox = False
            OptionsView.Indicator = True
            OptionsView.IndicatorWidth = 30
            object tvRemarkColumn1: TcxGridDBColumn
              Caption = #26085#26399
              DataBinding.FieldName = 'br_date'
              Width = 100
            end
            object tvRemarkColumn2: TcxGridDBColumn
              Caption = #22791#27880#20869#23481
              DataBinding.FieldName = 'br_content'
              Width = 400
            end
            object tvRemarkLast: TcxGridDBColumn
              Visible = False
            end
          end
          object tvProduct: TcxGridDBTableView [4]
            Navigator.Buttons.CustomButtons = <>
            DataController.DataSource = dsProduct
            DataController.Summary.DefaultGroupSummaryItems = <>
            DataController.Summary.FooterSummaryItems = <
              item
                Kind = skCount
                Column = tvProductColumn1
              end>
            DataController.Summary.SummaryGroups = <>
            OptionsView.Footer = True
            OptionsView.GroupByBox = False
            OptionsView.Indicator = True
            OptionsView.IndicatorWidth = 30
            object tvProductColumn1: TcxGridDBColumn
              Caption = #20869#37096#32534#21495
              DataBinding.FieldName = 'bpi_no'
              Width = 80
            end
            object tvProductColumn2: TcxGridDBColumn
              Caption = #20135#21697#22411#21495
              DataBinding.FieldName = 'bpi_realno'
              Width = 80
            end
            object tvProductColumn3: TcxGridDBColumn
              Caption = #20135#21697#31867#21035
              DataBinding.FieldName = 'bpi_cname'
              Width = 80
            end
            object tvProductColumn4: TcxGridDBColumn
              Caption = #20135#21697#21517#31216
              DataBinding.FieldName = 'bpi_simpname'
              Width = 80
            end
            object tvProductColumn5: TcxGridDBColumn
              Caption = #20013#25991#21697#21517
              DataBinding.FieldName = 'bpi_cnname'
              Width = 80
            end
            object tvProductColumn6: TcxGridDBColumn
              Caption = #33521#25991#21697#21517
              DataBinding.FieldName = 'bpi_enname'
              Width = 80
            end
            object tvProductColumn7: TcxGridDBColumn
              Caption = #22411#21495#25551#36848
              DataBinding.FieldName = 'bpi_desc'
              Width = 80
            end
            object tvProductColumn8: TcxGridDBColumn
              Caption = #24065#21035
              DataBinding.FieldName = 'bpf_mcode'
              Width = 80
            end
            object tvProductColumn9: TcxGridDBColumn
              Caption = #27719#29575
              DataBinding.FieldName = 'bpf_rate'
              Width = 80
            end
            object tvProductColumn10: TcxGridDBColumn
              Caption = #20215#26684
              DataBinding.FieldName = 'bpf_proce'
              Width = 80
            end
            object tvProductColumn11: TcxGridDBColumn
              Caption = #20215#26684#26085#26399
              DataBinding.FieldName = 'bpf_date'
              Width = 80
            end
          end
          inherited lvDetails: TcxGridLevel
            Caption = #32852#32476#20154#36164#26009
          end
          object lvFollow: TcxGridLevel
            Caption = #20379#24212#21830#36319#36394#35760#24405
            GridView = tvFollow
          end
          object lvOutBusiness: TcxGridLevel
            Caption = #20986#24046#35760#24405
            GridView = tvOutBusiness
          end
          object lvRemark: TcxGridLevel
            Caption = #22791#27880
            GridView = tvRemark
          end
          object lvProduct: TcxGridLevel
            Caption = #21830#21697#36164#26009
            GridView = tvProduct
          end
        end
      end
    end
    object grdRealno: TcxGrid [18]
      Left = 647
      Top = 52
      Width = 120
      Height = 120
      TabOrder = 14
      object tvRealno: TcxGridDBTableView
        Navigator.Buttons.CustomButtons = <>
        DataController.DataSource = dsRealno
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        OptionsView.GridLines = glNone
        OptionsView.GroupByBox = False
        OptionsView.Header = False
        object tvRealnoColumn1: TcxGridDBColumn
          DataBinding.FieldName = 'bf_cnname'
          Width = 118
        end
      end
      object lvRealno: TcxGridLevel
        GridView = tvRealno
      end
    end
    object RzDBEdit1: TRzDBEdit [19]
      Left = 71
      Top = 100
      Width = 120
      Height = 21
      DataSource = dsBase
      DataField = 'bf_taxcode'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = [sdBottom]
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 3
    end
    object RzDBEdit2: TRzDBEdit [20]
      Left = 255
      Top = 100
      Width = 120
      Height = 21
      DataSource = dsBase
      DataField = 'bf_bankname'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = [sdBottom]
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 8
    end
    object RzDBEdit3: TRzDBEdit [21]
      Left = 451
      Top = 100
      Width = 120
      Height = 21
      DataSource = dsBase
      DataField = 'bf_bankaccountno'
      FocusColor = 13824245
      FrameColor = 5607865
      FrameHotStyle = fsGroove
      FrameSides = [sdBottom]
      FrameVisible = True
      FramingPreference = fpCustomFraming
      TabOrder = 12
    end
    inherited lcgRoot: TdxLayoutGroup
      Index = -1
    end
    inherited lcgBaseInfoNormal: TdxLayoutGroup
      Index = 0
    end
    inherited lcgBaseInfoLeft: TdxLayoutGroup
      CaptionOptions.Visible = False
      ShowBorder = False
      Index = 0
    end
    inherited lcgBaseInfoMiddle: TdxLayoutGroup
      CaptionOptions.Visible = False
      ShowBorder = False
      Index = 1
    end
    inherited lcgBaseInfoRight: TdxLayoutGroup
      CaptionOptions.Visible = False
      ShowBorder = False
      Index = 2
    end
    inherited lcgBaseInfoLast: TdxLayoutGroup
      Index = 3
    end
    inherited lcgDetails: TdxLayoutGroup
      Index = 1
    end
    inherited lcpcDetails: TdxLayoutItem
      Index = 0
    end
    inherited lcgArchive: TdxLayoutGroup
      Visible = False
      Index = 2
    end
    inherited lcArchive2: TdxLayoutGroup
      Index = 0
    end
    inherited lcitemModifyStaff: TdxLayoutItem
      Index = 0
    end
    inherited lcitemModifyDate: TdxLayoutItem
      Index = 1
    end
    inherited lcgArchive1: TdxLayoutGroup
      Index = 1
    end
    inherited lcitemCreateStaff: TdxLayoutItem
      Index = 0
    end
    inherited lcitemCreateDate: TdxLayoutItem
      Index = 1
    end
    object lcMainItem17: TdxLayoutItem
      CaptionOptions.Text = #20379#24212#21830#32534#21495
      LayoutLookAndFeel = dmImages.lfMust
      Parent = lcgBaseInfoLeft
      Control = cxDBTextEdit15
      ControlOptions.ShowBorder = False
      Index = 0
    end
    object lcMainItem7: TdxLayoutItem
      CaptionOptions.Text = #36127#36131#20154
      Parent = lcgBaseInfoLeft
      Control = cxDBTextEdit7
      ControlOptions.ShowBorder = False
      Index = 1
    end
    object lcMainItem10: TdxLayoutItem
      CaptionOptions.Text = #37038#32534
      Parent = lcgBaseInfoLeft
      Control = cxDBTextEdit10
      ControlOptions.ShowBorder = False
      Index = 2
    end
    object lcMainItem5: TdxLayoutItem
      CaptionOptions.Text = #31246#21495
      Parent = lcgBaseInfoLeft
      Control = RzDBEdit1
      ControlOptions.ShowBorder = False
      Index = 3
    end
    object lcMainItem15: TdxLayoutItem
      AlignHorz = ahLeft
      CaptionOptions.Text = 'cxButton1'
      CaptionOptions.Visible = False
      Parent = lcgBaseInfoLeft
      Control = btnBank
      ControlOptions.ShowBorder = False
      Index = 4
    end
    object lcMainItem2: TdxLayoutItem
      CaptionOptions.Text = #21161#35760#21495
      LayoutLookAndFeel = dmImages.lfMust
      Parent = lcgBaseInfoMiddle
      Control = cxDBTextEdit2
      ControlOptions.ShowBorder = False
      Index = 0
    end
    object lcMainItem4: TdxLayoutItem
      CaptionOptions.Text = #22320#22336
      Parent = lcgBaseInfoMiddle
      Control = cxDBTextEdit4
      ControlOptions.ShowBorder = False
      Index = 1
    end
    object lcMainItem11: TdxLayoutItem
      CaptionOptions.Text = 'Email'
      Parent = lcgBaseInfoMiddle
      Control = cxDBTextEdit11
      ControlOptions.ShowBorder = False
      Index = 2
    end
    object lcMainItem6: TdxLayoutItem
      CaptionOptions.Text = #24320#25143#34892
      Parent = lcgBaseInfoMiddle
      Control = RzDBEdit2
      ControlOptions.ShowBorder = False
      Index = 3
    end
    object lcMainItem1: TdxLayoutItem
      CaptionOptions.Text = #31616#31216
      LayoutLookAndFeel = dmImages.lfMust
      Parent = lcgBaseInfoRight
      Control = cxDBTextEdit1
      ControlOptions.ShowBorder = False
      Index = 0
    end
    object lcMainItem8: TdxLayoutItem
      CaptionOptions.Text = #30005#35805
      Parent = lcgBaseInfoRight
      Control = cxDBTextEdit8
      ControlOptions.ShowBorder = False
      Index = 1
    end
    object lcMainItem12: TdxLayoutItem
      CaptionOptions.Text = #32593#31449
      Parent = lcgBaseInfoRight
      Control = cxDBTextEdit12
      ControlOptions.ShowBorder = False
      Index = 2
    end
    object lcMainItem13: TdxLayoutItem
      CaptionOptions.Text = #38134#34892#36134#21495
      Parent = lcgBaseInfoRight
      Control = RzDBEdit3
      ControlOptions.ShowBorder = False
      Index = 3
    end
    object lcMainItem3: TdxLayoutItem
      CaptionOptions.Text = #21517#31216
      LayoutLookAndFeel = dmImages.lfMust
      Parent = lcgBaseInfoLast
      Control = edtRealno
      ControlOptions.ShowBorder = False
      Index = 0
    end
    object lcitemRealno: TdxLayoutItem
      CaptionOptions.Text = ' '
      Parent = lcgBaseInfoLast
      Visible = False
      Control = grdRealno
      ControlOptions.ShowBorder = False
      Index = 1
    end
    object lcMainItem9: TdxLayoutItem
      CaptionOptions.Text = #20256#30495
      Parent = lcgBaseInfoLast
      Control = cxDBTextEdit9
      ControlOptions.ShowBorder = False
      Index = 2
    end
    object lcMainItem16: TdxLayoutItem
      CaptionOptions.Text = #21378#21830#31867#22411
      Parent = lcgBaseInfoLast
      Control = cbxFactoryType
      ControlOptions.ShowBorder = False
      Index = 3
    end
  end
  inherited pnlRight: TPanel
    inherited frameAttachs: TfrmAttachs
      inherited bmAttachs: TdxBarManager
        DockControlHeights = (
          0
          0
          26
          0)
      end
    end
  end
  inherited BarManager: TdxBarManager
    Top = 218
    DockControlHeights = (
      0
      0
      26
      0)
  end
  inherited tblBase: TDAMemDataTable
    Fields = <
      item
        Name = 'bf_id'
        DataType = datGuid
        Required = True
        InPrimaryKey = True
      end
      item
        Name = 'bf_no'
        DataType = datString
        Size = 20
        Required = True
      end
      item
        Name = 'bf_no2'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bf_simpname'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bf_cnname'
        DataType = datString
        Size = 60
      end
      item
        Name = 'bf_cnaddress'
        DataType = datString
        Size = 120
      end
      item
        Name = 'bf_province'
        DataType = datString
        Size = 20
      end
      item
        Name = 'bf_city'
        DataType = datString
        Size = 20
      end
      item
        Name = 'bf_principal'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bf_tel'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bf_fax'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bf_postcode'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bf_mail'
        DataType = datString
        Size = 60
      end
      item
        Name = 'bf_website'
        DataType = datString
        Size = 60
      end
      item
        Name = 'bf_way'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bf_type2'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bf_staff'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bf_staffid'
        DataType = datGuid
      end
      item
        Name = 'bf_staffiid'
        DataType = datInteger
      end
      item
        Name = 'bf_department'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bf_remark'
        DataType = datString
        Size = 120
      end
      item
        Name = 'bf_taxcode'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bf_bankname'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bf_bankaccountno'
        DataType = datString
        Size = 30
      end>
    LogicalName = 'b_factory'
    Top = 218
  end
  inherited dsBase: TDADataSource
    DataSet = tblBase.Dataset
  end
  inherited tblDetails: TDAMemDataTable
    Fields = <
      item
        Name = 'blm_id'
        DataType = datGuid
        Required = True
        InPrimaryKey = True
      end
      item
        Name = 'blm_pid'
        DataType = datGuid
      end
      item
        Name = 'blm_cnname'
        DataType = datString
        Size = 30
      end
      item
        Name = 'blm_enname'
        DataType = datString
        Size = 30
      end
      item
        Name = 'blm_department'
        DataType = datString
        Size = 30
      end
      item
        Name = 'blm_job'
        DataType = datString
        Size = 30
      end
      item
        Name = 'blm_tel'
        DataType = datString
        Size = 30
      end
      item
        Name = 'blm_fax'
        DataType = datString
        Size = 30
      end
      item
        Name = 'blm_mobile'
        DataType = datString
        Size = 30
      end
      item
        Name = 'blm_mail'
        DataType = datString
        Size = 60
      end
      item
        Name = 'blm_msn'
        DataType = datString
        Size = 60
      end
      item
        Name = 'blm_hobby'
        DataType = datString
        Size = 100
      end
      item
        Name = 'blm_fuzhe'
        DataType = datString
        Size = 100
      end>
    MasterMappingMode = mmWhere
    MasterSource = dsBase
    MasterFields = 'bf_id'
    DetailFields = 'blm_pid'
    LogicalName = 'b_linkman'
  end
  inherited dsDetails: TDADataSource
    DataSet = tblDetails.Dataset
  end
  inherited cxEditStyleController1: TcxEditStyleController
    PixelsPerInch = 96
  end
  inherited cxStyleRepository2: TcxStyleRepository
    PixelsPerInch = 96
  end
  inherited cxStyleRepository3: TcxStyleRepository
    PixelsPerInch = 96
  end
  object dsFollow: TDADataSource
    DataSet = tblFollow.Dataset
    DataTable = tblFollow
    Left = 84
    Top = 196
  end
  object tblFollow: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'bcf_id'
        DataType = datGuid
        Required = True
        InPrimaryKey = True
      end
      item
        Name = 'bcf_pid'
        DataType = datGuid
      end
      item
        Name = 'bcf_date'
        DataType = datDateTime
      end
      item
        Name = 'bcf_man'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bcf_staff'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bcf_title'
        DataType = datString
        Size = 60
      end
      item
        Name = 'bcf_content'
        DataType = datString
        Size = 4000
      end
      item
        Name = 'bcf_type'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bcf_filename'
        DataType = datString
        Size = 240
      end
      item
        Name = 'bcf_fileext'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bcf_opstaff'
        DataType = datString
        Size = 30
      end>
    Params = <>
    MasterMappingMode = mmWhere
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = ClientDataModule.RemoteDataAdapter
    BeforeInsert = tblFollowBeforeInsert
    BeforeEdit = tblFollowBeforeEdit
    BeforeDelete = tblFollowBeforeDelete
    OnNewRecord = tblFollowNewRecord
    MasterSource = dsBase
    MasterFields = 'bf_id'
    DetailFields = 'bcf_pid'
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'b_customerfollow'
    IndexDefs = <>
    Left = 54
    Top = 196
  end
  object dsRemark: TDADataSource
    DataSet = tblRemark.Dataset
    DataTable = tblRemark
    Left = 84
    Top = 234
  end
  object tblRemark: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'br_id'
        DataType = datGuid
        Required = True
        InPrimaryKey = True
      end
      item
        Name = 'br_pid'
        DataType = datGuid
      end
      item
        Name = 'br_date'
        DataType = datDateTime
      end
      item
        Name = 'br_content'
        DataType = datString
        Size = 500
      end>
    Params = <>
    MasterMappingMode = mmWhere
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = ClientDataModule.RemoteDataAdapter
    BeforeInsert = tblRemarkBeforeInsert
    BeforeEdit = tblRemarkBeforeEdit
    BeforeDelete = tblRemarkBeforeDelete
    OnNewRecord = tblRemarkNewRecord
    MasterSource = dsBase
    MasterFields = 'bf_id'
    DetailFields = 'br_pid'
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'b_remark'
    IndexDefs = <>
    Left = 54
    Top = 234
  end
  object dsOutBusiness: TDADataSource
    DataSet = tblOutBusiness.Dataset
    DataTable = tblOutBusiness
    Left = 84
    Top = 268
  end
  object tblOutBusiness: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'dob_id'
        DataType = datGuid
        Required = True
        InPrimaryKey = True
      end
      item
        Name = 'dob_pid'
        DataType = datGuid
      end
      item
        Name = 'dob_date'
        DataType = datDateTime
      end
      item
        Name = 'dob_man'
        DataType = datString
        Size = 30
      end
      item
        Name = 'dob_staff'
        DataType = datString
        Size = 30
      end
      item
        Name = 'dob_title'
        DataType = datString
        Size = 60
      end
      item
        Name = 'dob_content'
        DataType = datString
        Size = 300
      end
      item
        Name = 'dob_remark'
        DataType = datString
        Size = 120
      end
      item
        Name = 'dob_filename'
        DataType = datString
        Size = 240
      end
      item
        Name = 'dob_opstaff'
        DataType = datString
        Size = 30
      end>
    Params = <>
    MasterMappingMode = mmWhere
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = ClientDataModule.RemoteDataAdapter
    BeforeInsert = tblOutBusinessBeforeInsert
    BeforeEdit = tblOutBusinessBeforeEdit
    BeforeDelete = tblOutBusinessBeforeDelete
    OnNewRecord = tblOutBusinessNewRecord
    MasterSource = dsBase
    MasterFields = 'bf_id'
    DetailFields = 'dob_pid'
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'd_outbusiness'
    IndexDefs = <>
    Left = 52
    Top = 270
  end
  object dsProduct: TDADataSource
    DataSet = tblProduct.Dataset
    DataTable = tblProduct
    Left = 84
    Top = 308
  end
  object tblProduct: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'bpi_no'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bpi_realno'
        DataType = datString
        Size = 120
      end
      item
        Name = 'bpi_cname'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bpi_simpname'
        DataType = datString
        Size = 120
      end
      item
        Name = 'bpi_cnname'
        DataType = datString
        Size = 120
      end
      item
        Name = 'bpi_enname'
        DataType = datString
        Size = 120
      end
      item
        Name = 'bpi_desc'
        DataType = datString
        Size = 240
      end
      item
        Name = 'bpf_mcode'
        DataType = datString
        Size = 10
      end
      item
        Name = 'bpf_rate'
        DataType = datFloat
      end
      item
        Name = 'bpf_price'
        DataType = datFloat
      end
      item
        Name = 'bpf_date'
        DataType = datDateTime
      end
      item
        Name = 'bpf_fid'
        DataType = datGuid
      end>
    Params = <>
    MasterMappingMode = mmWhere
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = ClientDataModule.RemoteDataAdapter
    BeforeInsert = tblProductBeforeInsert
    BeforeEdit = tblProductBeforeEdit
    BeforeDelete = tblProductBeforeDelete
    ReadOnly = True
    MasterSource = dsBase
    MasterFields = 'bf_id'
    DetailFields = 'bpf_fid'
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'b_factoryproduct'
    IndexDefs = <>
    Left = 52
    Top = 310
  end
  object tblBrowser: TDAMemDataTable
    RemoteUpdatesOptions = [ruoOnPost]
    Fields = <
      item
        Name = 'bcf_id'
        DataType = datGuid
        Required = True
        InPrimaryKey = True
      end
      item
        Name = 'bcf_pid'
        DataType = datGuid
      end
      item
        Name = 'bcf_filename'
        DataType = datString
        Size = 240
      end
      item
        Name = 'bcf_fileext'
        DataType = datString
        Size = 30
      end
      item
        Name = 'bcf_file'
        DataType = datBlob
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = ClientDataModule.RemoteDataAdapter
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'b_customerfollow1'
    IndexDefs = <>
    Left = 524
    Top = 280
  end
  object dsRealno: TDADataSource
    AutoEdit = False
    DataSet = tblRealno.Dataset
    DataTable = tblRealno
    Left = 584
    Top = 222
  end
  object tblRealno: TDAMemDataTable
    RemoteUpdatesOptions = [ruoOnPost]
    Fields = <
      item
        Name = 'bf_cnname'
        DataType = datString
        Size = 60
        OnValidate = tblRealnobf_cnnameValidate
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = ClientDataModule.RemoteDataAdapter
    ReadOnly = True
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'fcn_name'
    IndexDefs = <>
    Left = 552
    Top = 224
  end
  object odlgAttachs: TRzOpenDialog
    Left = 560
    Top = 310
  end
  object sdlgAttachs: TRzSaveDialog
    Left = 596
    Top = 310
  end
  object tblBrowser2: TDAMemDataTable
    RemoteUpdatesOptions = [ruoOnPost]
    Fields = <
      item
        Name = 'dob_id'
        DataType = datGuid
        Required = True
        InPrimaryKey = True
      end
      item
        Name = 'dob_pid'
        DataType = datGuid
      end
      item
        Name = 'dob_filename'
        DataType = datString
        Size = 240
      end
      item
        Name = 'dob_fileext'
        DataType = datString
        Size = 30
      end
      item
        Name = 'dob_file'
        DataType = datBlob
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = ClientDataModule.RemoteDataAdapter
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'd_outbusiness1'
    IndexDefs = <>
    Left = 468
    Top = 288
  end
end
